home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
BBS in a Box 7
/
BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso
/
Files
/
Util
/
Pm-Pz
/
Postscript CMNDS
< prev
next >
Wrap
Internet Message Format
|
1987-10-29
|
55KB
From ecsvax!mcnc!felix!macintosh Fri Oct 23 12:09:27 EDT 1987
Article 254 of comp.binaries.mac:
Path: dukeac!ecsvax!mcnc!felix!macintosh
>From: CER@STAR.STANFORD.EDU (Craig Rasmussen)
Newsgroups: comp.binaries.mac
Subject: PseudoPS
Message-ID: <9886@felix.UUCP>
Date: 18 Oct 87 06:00:21 GMT
Sender: macintosh@felix.UUCP
Lines: 843
Approved: INFO-MAC@SUMEX-AIM.STANFORD.EDU
[Info-Mac Archives: <INFO-MAC>UTILITY-PSEUDOPS05-PART[1-3].HQX]
I posted a note a while ago about the availability of a small
PostScript interpreter which runs on Macintosh. This program reads
PostScript from a text file and displays the graphics on the Macintosh
screen. I wasn't sure if it would be useful to anyone so I did not
publish the code at that time. However, from the large number of mail
messages I have received, it seems that it might be useful after all.
Thus, I'm sending a BinHex version of the program to info-mac. The
BinHex file includes the program PseudoPS (v0.5), a short helpfile, and
the LightSpeed C code. Beware that PseudoPS only parses a small subset
of the PostScript language and it has not been extensively debugged.
The PostScript subset includes moveto, rmoveto, lineto, rlineto, arc,
translate, scale, setlinewidth, setgray, newpath, closepath, fill,
stroke, scalefont, and show. If an unknown command is encountered an
%offending command message is printed to the file "PS.errors".
However, the program continues so things can get messed up in a hurry
if for instance, paths are not explicitly closed or if unknown commands
leave the stack in a unknown state.
The goal of this project was to make a "movie" on the Macintosh and not
to make an accurate rendition of PostScript. It was kind of fun
programming for the Mac, though, wished I could do it more often.
Scientific programming is not very often exciting or challenging.
[Moderator's Note: The sources for this program have been posted
to comp.sources.mac and are not included in the PackIt file.]
---
(This file must be converted with BinHex 4.0)
:$&"cCA9NEe"6,R"TG!"3593J8%P8)!#3"*T%!*!%8*036@&R$&"cCA9NEe"6,Q4
[Bb"%Ef0c!%%-CJ#3"U!M!!$T-!!!bm`!33%#!"3!2`#3!``!N!--!*!$)J""*IJ
!!&4&@&4&BA*X!3#3"3IJ!*!%R9i3IjeH%(pqh9"cCA9NEe"6)'Pc)'%JGQ9bH5"
cE@&XE#"3Eh0d8f0bDA"d)'PZG'9bF(*PG'9b,L!J9'KTFb"fCA*cD@pZ)(*PB@4
c)&"[Fh46Bh*TF(30CR*[E5"K)(4PH(3JCQPXC5"KEQ3JC'PcF'aKHA-JG'KP)'G
bBA"SD@0c)(4[)(4SC5"0B@0TER4[FfJJFf0bC@9Z,L!J6'pRD@0KE'aj,!edD'9
bC5"TFb"bC@&XE(NJEfjXH5"[EQ8JBfpYE@&ZC#!SBQ9cD@4PFb"4G@Pd+5iJ)%*
j)(9cD@jR)(4SC5"2F'9Z)'0[E@eKEQ30CR*[E5"dD'8J4QPXC5"YC@je,#"[EQ8
JBf&Z)(0PE'9MG#"dD'8JG'KP)&"[Fh46Bh*TF(3JCQPXC5"dEb"LC5"NDA0`E'&
jC@3Z)#""F`eK)(4PFh3JH@pe)'eTCfKd)(GKER3JG'mJEh"PEL"dD'8JCQPXC5$
58'pcG&0MFQP`G#jNC@e[dbiJ$3e8D'8J8'pcG&0MFQP`G#"cG@*cCA3JD@jME(9
NCA-k)'e[GQ9dEb`JFQe[GQ9dEb`JE'PZCA4[,#"bE'PZCA4[,#"KFQ-X$A4bB@j
cE'&dC5`JFf0KE'8X)(0PG'aTEQ9hD@4dD#`JFf9dCh*KH5`JEQ9hF'&dD#`JBfa
[Ff9`BA4S,#"QD@aX,#"cG(*[Df8X$A0MB@aPCQpZG#`JB@jN)(0SEhFZ)#"*CL"
KEL"eEQYZEhGZ)'0[E@eKEQ3JDA-JC@jMEh9ZG'9bC@3JB@iJ*@pQCQ9ZC'PZC`e
MEfeYB@jN)'ePFh0KCf8JDA-JF(*TER4PC#"dEb"dD'8JCQPXC5!L8&-ZCA*bEh*
c)LiJ)%K[Gf9fCA)X)(4SC5"`FQpRFQ&Y$@0[ER4TER9PFb"cEb"dD'PZCh-JBf&
Z)'GPG#"YCA0cC@3JGA!JD@iJB5"SGA*bH5!Y,5"TCL"QEh)JD@jcG'&ZBf8X)("
KG'Kc)'&bC3eZEh3JCAK`E'PMDA4XH5"ME'pcC@3JEh)JD@BJB@iJG@jVEQphEL"
MEfeYB@jN)'aPBACPFb"dD'8JFh4KBfXJD@iJB5"eEQYZEhGZ$A0dBA4P,L!J35"
YD@j[FL"TFR*TG'&dD@pZ)'Pc)(4SBA3JD@BJB5"QD@aP)'KKFb"KE(*PB@4j)'*
PC@iJC'PcF'aKH@9N)'&ZC!eTG09c)(GTEQ4[Gb"SBA-JBQ9PEL"ME'pcC@3X)(4
SC5"QD@aPeA-JGfPZC'ph)'eeFh3JCQPbFh3JBQ8JFf9XC@0dC@3J+'CbEfdJG'K
P$AGTEQ4[Gb"YC@je+5"LC@C[FQ8JDA3JBf&Z)'*P)'4TFh"XBAPPC#"KCf&TELi
J$3e8D'8JCfpKE#"[CL"dD'Pc)("bEfTPBh3JGf&c)(4[)'eKDf8JB5!LE@pfD@8
L)'pZ)(4SC5"0B@0TER4[FfJJB@jN)'j[G#"dEb"YB@YP$@&Z)'&MBh9bBA4P)(*
PEQ4TG'P[EL"[CL"3Eh0d8f0bDA"d,L!J5A3JGf&c)'YTEQ3JEfBJCR9Z)("bEfG
bB@eYD@jR)'C[FL"dD'806@&M,#"dD'peCfJX)(GTFfKPC#"*)'0[G@aN)'4[)'P
d)'e[FQ8JEfCdC@iZ)#"&GQ9Z)(4SEh9RD#"dD'Pc)("bEfGbB@dJGfPXE!eSB@j
NE'8JEfjXH5"K)(0YB@aX)(0eBR0PG#"[CL"dD'8J8'pcG&0MFQP`G#"XB@jRG@&
RC5`JDA3JD'&c)'*PC@iJGA0PCR9X)(4[)'eP$@&ZC#"*)'K[F'8JG'KKG#"jEh8
JE@&j)'CTEQ3JDA3JGA0PCR9X)'&c)(GPE'`Z)#"2D#"jCA-X)("XC@&cC5"QFQ9
PE(N0C'PcG(*TBR9dC5"KEQ3JD@e`FQpfC5"TG#iJ)%PQ)(P[G5"NEb"TEA"bEhC
P)'Pd,#"`E'9KFf8JE@&TE#"dD'8JBfKKEQGPFb"LB@0V$A4[)'eP)'&ZC#"*e@a
X)(4bH5"dEb"YB@PZG'&TEL"dD'8JBA*MD'PfC@3JGQ9bFfP[ELiJ$3d[+JdJ+L!
J8(0PG@4[8&-J,5dJB5"cE@&XE#"3Eh0d8f0bDA"d)'PZG'9bF(*PG'9b)#Ja16J
h+3dJ+JdJ+L!J9h*TG(4PEL"LH3N*3h*KD@FJ45"5BA0YGA0cC@i0)#S*N!0$C@j
dCA)JCQpb)%&dE@pcF'KPFQPM)'&ZC#"6F'&MC5"6BfPPEQ0P$5!U#C!$9A4KD#"
6G'&dC5"9EQPfCA*cDA4j$5!U#C!$6'pRB@iX)&9dB@JJ1$3c-M)Y0$3`03dJ+JQ
3!bJi-$%T)$Fe-#db16Bh$5!U$5!U#@9YB@PX#3NY)'0PFN"cG'&b,R0dB@jQEh*
N,Q9NG3dJ+JN*)*!),5"dD'9[FRNk1Q0bB@PR)'pZ)(4SC5"68%&1)'jPG(G[FQX
0)#S0)#SJ)(GTG'JJG'KP)(9cC5"[CL"6D@e`E'98EfpXFbjM)#!SBbNJ4A*TDb"
,D@aV)$%j1$B0)#SJ$5!U)#"-D@jV)(GTG'JJ6'PRD(46F'9PC%-JE@pNG@aPF`d
J+JNJ)#d*6@&M9(*KF(-0)#S*)#!Y#@eKG'J0)#S*)#!Y#A0dC'P[$5!U#5!J,3P
cG(*TEQGc$5!U#5!J,3PeEQPi$5!U,`f'[P"0B@F)8(0PG@4[8&-J-Li`)%4[Bh-
!33aQ!*!'S#-!!1N`!!$,c!""!3)!&!!r!*!$$!#3!``!N!-L!%%Pq!!!39"36$q
3"#%!N!Q2F*eAX-'G9lJq2Zi!!!%!N!11UJ!!MDS!N!2'-3"1ZJ!X60m!M#)I6R8
J,`!%,d%!"#)[!!J[A`!%51Fa!%kk!!`J!8cI!)`L(dje5S"U(%U"DJa%J%5"6VS
!)%5"6R9%J%kk!"C%J%5"6R9+J@S+4)&1ZJ!'4)"1G5im!!$rrl+!B`BL!(!!6R@
`Kf)-J-&)3$)!3N")3%jeXSGL'Li!3N")3)$"5%")4ci!5%H1`6!(5%Fb"dje*!!
Q!H+)iSQbKf,iJ-(!Kc)$`X!Z!dK(cX")4p+(C3L5JQ)%4)&1G90!B13b2+R`3rV
pJ%kk!%Sb2+Rb3rVpcNkk!$ib2+Rc3rVpc%kk!$)b2+Rd!!!()Ld!4QPXC3!!6Q9
h!%9NDA3!!&9ZC'm!!%9NDA3!!#d!4@4TG!!!3h9d,eJ!4@4TG!!!3fp`H5p$!!"
&C'Pd!!"3BA0dC5p@!%9NDA3!!%0XC@&b!*!$6Qpd)'9ZEh9RD#"YC@e[FRNJG'm
JC'mJG'KKG#i!4QPXC3!!,3"'D@aP!!"4G@Pd,e%!!>EQ4[Gh-!N!GKFQ-!3!@
d!*!(Bfa[Ff9`BA4S!'0XEh0PF'&dD#!SEQmJ8Q9RD@pZ5'&ZC'aP+3"ME'pcCA"
KG'JJ+'j[)'0eFR*PER3JF'&dD#N!CQPXE!!!CQPXE#!SEQmJ8Q9RD@pZ5'&ZC'a
P+3!!E'PZCA4[!!"YEhCPG'm!!'jPGh"KG'J!EQ9hF'&dD#!SFQ9RD@pZ)'&XFQ9
KC(NJEh"PELN!EQ9hF'&dD#!S8Q9RD@pZ5'&ZC'aP)'&XFQ9KC(NJBh*PBA4PC#N
!!(*XD@jPG'm!FQe[GQ9dE`"bEh4KG'8!N!`rri!!N!GcBf&XC3"cBf&XC@C[ER3
!Ff9dCh*KH3!rrZ!!N!FrrU!!N!FrrF!!N!Frr)!!N!GcCA4XD@jPGfPNG'J!!(0
SEhF!!(0SEhG`B@GP!!"cG(*[Df8!!(0dFQpVC5!SEQmJ8Q9RD@pZ5'&ZC'aP+3!
!G(*KER0XBA4P!#8PEfCQC@jND@jR)'0[E@eKEQ3J,6iJ*A-+!!!+*59cG'&MDb"
PFR*[FJS!N"8rri!!N!Frri!!N"%rri!!N"%"&!4'D@aP!"dS6Q9h1dp`C@il3fa
[Ff8l+&0KGQ8l+#dl8A9TG!4&C'Pd!#3S9@jNEcXS,6XS3h9d1bK$Eh"j1bK3BA0
dC6XS3faPBA)l+#d!1b"$E'PMDb"ME'pcC5"LEhJJEfBJG'KTFb"hD@jNEhFJEh)
JF(*PFh-J8Q9dGA*Z)(4[)'0[ER4TER9P#d9iDA3J9fPZC'phBfpZFfpXC3#3"5j
"6h9d!#j#6h9d!(GL!!!08dP(4%C-)(*PFf9d)3S!6'PRD(4cF'9PC%1U)%aTBR*
KFQPPFb!a,M8h!#K$+5"$Eh"jFQPRD(3J-6Ni0L"85%P15b"8C@0SEQpXEfGTCA-
X5@jM,L""E'`JFQPRD(4c)(*PFf9bGQ9N!!!rri!!N!Hrri!!N"'rri!!N!G!!-N
2fU)KD-)c2rq!!*!(2rq!!*!(3!#!!*!(2rq!!*!42rq!!*!(2rr*$pUL)@M#-cr
pQC!)2rq!!*!(2rq!!*!(2pk!!*!$$RQ8qcrrJ!#3*6rrb3rDSL&S`M-!N!T!!-N
2fU)KD-)c!*!+2rk!!*!(2rf!!*!(3!#!!*!E2rq!!*!(2rk!!*!(2rk!!*!(3!#
!!*!j2pk!!*!$$RQ8qcrrJ!#3"crqJ!#3'crHJ!#3!`jjP2[!!)!!N!G!!)!!N!F
&3@*[FR4&C'Pd!*!%4@4TG!#3"&"cCA9NEe"6)#dY)'*j)%0bB@PR)%8J8Q&cEA9
cFf9Z)#Ja16Jh+3d!!%%JGQ9bH5"cE@&XE#"3Eh0d8f0bDA"d)'PZG'9bF(*PG'9
b,Jd!8'aPBA0P)'CbC@9XH5"NDA0dFQPLGA4P)'&ZC#"TEA"bEhCP,Jd!!&"bEfG
bB@eYC@3JGfPdD#"dD'8JB@PN)'pQ)&0TEA"XC94[Efac$3!SBbNJ4A*TDb",D@a
V)$%j1$B!!'%JCQPXC5"TFb"KE(*PB@4j)'p`C@i!!&4&@&3!!()!4QPXC3!!6h"
PELk3!bp2!%&LEh9d)&"cG@9NEe"6,T!$!%&LEh9d)&"cG@9NEe"6,T!$!%CTE'8
!!%p`C@iZN!-[6`"38bjPFR*[FR-!G`""BQpeG#"3Fh9PC'p38bk3!`"3Eh0d8f0
bDA"d)'*eCQCPFL"[GQ9bCQa[G`S!G@jdCA*YD@jKG'9N)&"[Fh46Bh*TF(3JFh4
bD@jR#J"'D@aP!!"2F'9Z,T!$,dm!4QPXC3!!6h"PELk3!bp2!*!%DJ)3!!B!N!-
#!!)!!J!'!!)!!J!#!!)!0!#!!)i!N!--!!!"2J#%!!`!$!!-!!i!$J!1!!i!$J!
1!!i!$J!1!!i!$J!1!!i!$J!1!!i!$J!1!!i!$J!1!!i!$J!1!!i!$J!1!"S!"J!
!!5i!!!'m!!$rr`!!&!$rr`!!rrm!!J#3!cJ!m3"-!5d%!Np,!*!$"3!&!$B",3J
!N!3i!+`!6!$S"!C$B@jMC@`!N!-$!*!$)3$`!$8",!3#6dX!N!-)!!J!+!$S#!#
3"#X!#!",!1J3!*!%#!$`!"`",!3'3f&ZBf9X!!$rrrM1!!"1l3"U!*!$"!!*!*!
$!3!!!3#3!`%!N!3`N!1`-*!&X*!&-*!5N!"3N!mHN!J@&P#3"a@3"K'3&"K@
3"K'3&"$!!N!0`!*!%!5J!N!3#+!#3"!-!N!-%!*!$"3#3!`B!N!-(!*!$#!#
3!`N!N!-+!*!$#`#3!``!N!-0!*!$$J#3!`m!N!-3!*!$%3#3!a)!N!-6!*!$&!#
3!a8!N!-@!*!$&`#3!aJ!N!-C!*!$'J#3!aX!N!-F!*!$(3#3!aii!*!$Irjrrj!
(Irm!!%!!e*Ti5mdEL[i!N!-"!*!&